home *** CD-ROM | disk | FTP | other *** search
/ The CD-ROM Directory (13th Edition) / The CD-ROM Directory 13.iso / install / inscript.deu < prev    next >
Text File  |  1993-11-19  |  17KB  |  710 lines
  1. ; CD Answer Installation Script - Generic                          jdk,ejf,hg
  2. ; <<CDA>> Jun 1 1993;3.2
  3. ; Apr 8 1993; hs
  4. ; single/multiple disk version
  5. ;
  6. ;   To customize this install script:
  7. ;      1. Put the product name (1-8 characters) in a file called
  8. ;         'PRODNAME'. There should be no carriage return/line feed at
  9. ;         the end of the name- the file should contain just the characters
  10. ;         of the name.
  11. ;      2. Put the application name (CD Author 4 character project identifier)
  12. ;         in a file called 'APPLNAME'. Again, no other chars should be
  13. ;         the file. Multiple applications are formed by adding a space,
  14. ;         then another application identifier
  15. ;      3. Put the start-up message in a file called PRODSCRN.<language>
  16. ;         There should not be more than 10 lines.
  17. ;
  18. ;    The first disk must contain the \INSTALL directory.
  19. ;    This contains the general system files for the install
  20. ;    process and may be repeated on disk #2, etc.
  21. ;    The application specific files are kept in a directory
  22. ;    named 'DISK1'. If additional disks are required, create
  23. ;    an (empty) file on the current disk named '\MORE' and
  24. ;    put the overflow files in a directory named \DISK2 (3, 4, ...).
  25.  
  26. BREAK abort
  27.  
  28. ; install disk
  29. PARSE_PATH <$ProgDir>
  30. SET insdrive = <$Drive>
  31. SET ins = <insdrive>\INSTALL
  32. SET curdisk = 1
  33. GOSUB need_disk
  34.  
  35. ; here are some defaults:
  36.  
  37. ;  default destination drive
  38. PARSE_PATH <$CurDir>
  39. SET def_dest = C:\
  40. IF NOT "<$Drive>"=="<insdrive>" DO SET def_def = <$Drive>
  41.  
  42. ;TFPL - 7-6-93
  43. ;CONFIG Colors = 0 2 0 30 0 30 0 30 0 112 0 143 0 79 0 79 0 48 0 15 0 30 0 79 0 143 1 30
  44. ;CONFIG ColorSet = 55
  45. ;TFPL
  46.  
  47. ;  default CD-ROM interface (FS_HSGEN {High Sierra} or FS_ISGEN {ISO})
  48. SET def_cdtype = High Sierra
  49. SET def_driver = FS_HSGEN
  50. IF EXISTS <insdrive>\INSTALL\<def_driver>.* GOTO ok_driver
  51. SET def_cdtype = ISO
  52. SET def_driver = FS_ISGEN
  53. :ok_driver
  54.  
  55. ;  language
  56. SET def_lang = <$Language>
  57.  
  58. ; application name(s) (4 char ident(s) on CD-ROM)
  59. READFILE names = <ins>\APPLNAME.
  60.  
  61. ; product name (application name for batch file, subdirectory name)
  62. READFILE prod = <ins>\PRODNAME.
  63.  
  64. ; default dest drive and directory
  65. PARSE_PATH <def_dest><prod>.CD
  66. SET dstdrive = <$Drive>
  67. SET path = <$Dir>
  68. CD <dstdrive>\
  69.  
  70. ; read and display Application Installation Screen
  71. IF NOT EXISTS <insdrive>\INSTALL\PRODSCRN.<def_lang> GOTO no_banner
  72. READFILE screen = <insdrive>\INSTALL\PRODSCRN.<def_lang>
  73. GOTO show_banner
  74. :no_banner
  75. SET screen =
  76. ----        CD Answer Installation für:\n\n
  77. ----               <prod>\n\n
  78. ----        Applikation(en): <names>
  79. :show_banner
  80. CLEAR
  81. TEXT <screen>
  82. SET screen =
  83. WAIT
  84.  
  85. GOTO okdir
  86. :getdir
  87. CLEAR
  88. TEXT \nFehler:\n\n
  89. ----Der Pfad "<dstdrive><path>" ist nicht zulässig!\n
  90. ----Es muß eine Laufwerksangabe sowie ein gültiger Unterverzeichnisname
  91. ---- vorhanden sein, um die Software zu installieren.
  92. WAIT
  93. :okdir
  94. CLEAR
  95. TEXT Die Retrieval-Software muß auf einer Festplatte oder auf eine\n
  96. ----formatierte Floppy Diskette installiert werden. Die Standard-\n
  97. ----angaben sind Laufwerk C: (normalerweise die Festplatte) und\n
  98. ----Unterverzeichnis <path>. Um diese Angaben zu wählen,\n
  99. ----die ┘ (Eingabe) Taste zweimal betätigen.  Um sie zu ändern, die\n
  100. ----gewünschten Parameter nach Aufforderung eingeben.\n
  101.  
  102. INPUT 6,8,5 dstdrive  = Installieren auf Laufwerk        ?
  103. INPUT 6,10,40 path    = Installieren in Unterverzeichnis ?
  104. SET dest = <dstdrive><path>
  105. SET confile = <ins>\_DW_.CFG
  106.  
  107. IF "<dstdrive>"=="" GOTO getdir
  108. IF "<path>"=="\" GOTO getdir
  109. IF "<path>"=="" GOTO getdir
  110. IF NOT DIREXISTS <dstdrive>\ GOTO getdir
  111.  
  112. CD <dstdrive>\
  113.  
  114. IF NOT DIREXISTS <dest> GOTO nopath
  115. IF NOT EXISTS <dest>\DW.EXE GOTO nopath
  116. CLEAR
  117. TEXT Das Unterverzeichnis "<dest>" existiert bereits.
  118. NEWMENU 1,3,67
  119. ;TFPL -7-6-93
  120. MENU neue Version und nur Oberfläche installieren
  121. MENU neue Version und alle Sprachoberflächen installieren
  122. ;TFPL
  123. MENU Alte Version löschen; neue Version NICHT installieren
  124. MENU Konfiguration ändern; Software nicht kopieren
  125. MENU Installation abbrechen ohne Änderungen
  126. ENDCHOICES
  127. ;TFPL 7-6-93
  128. CHOICE 1
  129. CLEAR
  130. TEXT Vorhandene <dest> wird gelöscht...
  131. FOREACH name = <names>
  132.  DEL <dest>\<name>*.*
  133. NEXT
  134. DEL <dest>\FS_*.DRV
  135. DEL <dest>\SC_*.DRV
  136. DEL <dest>\PR_*.DRV
  137. DEL <dest>\GR_*.DRV
  138. DEL <dest>\_DW_*.*
  139. DEL <dest>\ADL_MSGS.*
  140. DEL <dest>\DW.EXE
  141. DEL <dest>\UPDATE.EXE
  142. SET ch = 2
  143. GOTO okpath
  144. ;TFPL
  145.  
  146. CHOICE 2
  147. CLEAR
  148. TEXT Vorhandene <dest> wird gelöscht...
  149. FOREACH name = <names>
  150.  DEL <dest>\<name>*.*
  151. NEXT
  152. DEL <dest>\FS_*.DRV
  153. DEL <dest>\SC_*.DRV
  154. DEL <dest>\PR_*.DRV
  155. DEL <dest>\GR_*.DRV
  156. DEL <dest>\_DW_*.*
  157. DEL <dest>\ADL_MSGS.*
  158. DEL <dest>\DW.EXE
  159. DEL <dest>\UPDATE.EXE
  160. SET ch = 3
  161. GOTO okpath
  162.  
  163. CHOICE 3
  164. CLEAR
  165. TEXT Verzeichnis <dest> wird gelöscht...
  166. FOREACH name = <names>
  167.  DEL <dest>\<name>*.*
  168. NEXT
  169. DEL <dest>\FS_*.DRV
  170. DEL <dest>\SC_*.DRV
  171. DEL <dest>\PR_*.DRV
  172. DEL <dest>\GR_*.DRV
  173. DEL <dest>\_DW_*.*
  174. DEL <dest>\ADL_MSGS.*
  175. DEL <dest>\DW.EXE
  176. DEL <dest>\UPDATE.EXE
  177. IF NOT EXISTS <dest>\*.* GOTO remdest
  178. TEXT <dest> Verzeichnis hat unbekannte Dateien. Verzeichnis nicht entfernt!!
  179. WAIT
  180. GOTO norem
  181. :remdest
  182. RD <dest>
  183. :norem
  184. DEL <dstdrive>\<prod>.BAT
  185. GOTO end2
  186.  
  187. CHOICE 4
  188. SET alter = Y
  189. SET confile = <dest>\_DW_.CFG
  190. GOTO okpath
  191.  
  192. CHOICE 5
  193. GOTO end2
  194. ENDCHOICES
  195.  
  196. :nopath
  197. MD <dest>
  198. IF NOT DIREXISTS <dest> GOTO getdir
  199. ;TFPL 7-6-93
  200.  
  201. TEXT New Installation
  202. NEWMENU 1, 3, 64
  203. MENU neue Version und nur Oberfläche installieren
  204. MENU neue Version und alle Sprachoberflächen installieren
  205. ENDCHOICES
  206.  
  207. CHOICE1
  208. SET ch = 2
  209. GOTO okpath
  210.  
  211. CHOICE2
  212. SET ch = 3
  213. GOTO okpath
  214. ENDCHOICES
  215.  
  216. :okpath
  217.  
  218. ;----------------------------------------------------------------------------
  219.  
  220. IF NOT EXISTS <confile> GOTO no_config
  221. DISP 5,14 Konfiguration wird gelesen...
  222. READCONFIG <confile>
  223. :no_config
  224.  
  225. ;----------------------------------------------------------------------------
  226.  
  227. HSCOUNT hs
  228. IF NOT <hs>==0 GOTO have_hs
  229.  
  230. CLEAR
  231. TEXT FEHLER: Es ist kein CD-ROM Treiber installiert.\n\n
  232. ----Bitte benutzen Sie die vom Hersteller mitgelieferte Installations-\n
  233. ----diskette, um Ihre spezielle Treiber-Software zu installieren,
  234. ---- und wiederholen Sie anschließend dieses Installationsprogramm.\n\n
  235. ----HINWEIS: Durch die Installation des CD-ROM Treibers werden
  236. ---- Dateien auf Ihre Festplatte übertragen und die CONFIG.SYS und die
  237. ---- AUTOEXEC.BAT Dateien verändert. Wenn Sie keine Programme haben,
  238. ---- die das MSCDEX Programm
  239. ---- verwenden, empfehlen wir, MSCDEX aus Ihrer
  240. ---- AUTOEXEC.BAT Datei zu entfernen; diese Software benötigt dieses Programm
  241. ---- nicht.\n\n
  242. ----MERKE: Nach der Installation des CD-ROM Treibers neu booten !!
  243. WAIT
  244. ABORT
  245.  
  246. :have_hs
  247. ;TFPL 19-11-93
  248. GOTO get_hs_letter
  249.  
  250.  
  251. SET msg =
  252. IF <hs>==1 GOTO instOne
  253.  
  254. TEXT Die folgenden <def_cdtype> Treiber sind vorhanden:\n\n
  255. ----Selektieren Sie den <def_cdtype> Gerätetreiber aus der Liste vorhandener
  256. ---- Gerätetreiber mit den  und  Tasten und betätigen Sie ┘ (Eingabe).
  257. ----Betätigen Sie Esc um die Installation abzubrechen.
  258. GOTO :instMore
  259.  
  260. :instOne
  261. SET msg = Ein <def_cdtype> Treiber ist installiert (siehe CONFIG.SYS):\n\n
  262.  
  263. :instMore
  264. HSDRIVER hsname = 25, 6
  265. CONFIG Driver = "<def_driver>=<hsname>"
  266. CLEAR
  267. TEXT <msg>Der selektierte <def_cdtype> Treiber hat den Namen "<hsname>".
  268. ---- Wenn dieser nicht gültig sein soll, betätigen Sie Esc, um die Installation
  269. ---- abzubrechen und überprüfen Sie die CONFIG.SYS Datei.\n\n
  270. ----Diese Software benötigt das Programm MSCDEX.EXE (Microsoft
  271. ---- CD-ROM Extensions) NICHT. Wenn keine anderen Anwendungen dieses Programm
  272. ---- benötigen, können Sie es aus der \AUTOEXEC.BAT Datei entfernen.\n\n
  273. ----Bemerkung: Manche Installationsprogramme fügen das Microsoft CD-ROM Extensions
  274. ---- automatisch in die \AUTOEXEC.BAT Datei ein.
  275. WAIT
  276.  
  277. CLEAR
  278. TEXT <def_cdtype> Treiber wird kopiert...
  279. SET driver_name = <def_driver>.DRV
  280. GOSUB copy_driver
  281. ;TFPL 19-11-93
  282. :get_hs_letter
  283. CLEAR
  284. :tfpl_drive
  285. GOTO tfp1
  286. :drive_error
  287. TEXT Error: The database is not available on the specified drive...\n\n
  288. :tfp1
  289. TEXT \n\n
  290. ----Geben Sie bi